home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / ClickyButtons2.cpt / ClickyButtons2 / card_2872.txt < prev    next >
Text File  |  1989-02-26  |  12KB  |  545 lines
  1. -- card: 2872 from stack: in
  2. -- bmap block id: 3220
  3. -- flags: 0000
  4. -- background id: 2774
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   hide menubar
  9. end openCard
  10.  
  11.  
  12.  
  13. -- part 5 (button)
  14. -- low flags: 00
  15. -- high flags: 2000
  16. -- rect: left=112 top=292 right=324 bottom=148
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 20098 / 20098
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: New Button
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   answer "Go to Home stack?" with "Home..." or "Cancel"
  28.   if it is "Cancel" then exit mouseUp
  29.   visual dissolve
  30.   go home
  31. end mouseUp
  32.  
  33.  
  34.  
  35. -- part 6 (button)
  36. -- low flags: 00
  37. -- high flags: 2000
  38. -- rect: left=40 top=291 right=326 bottom=82
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 1000 / 1000
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: New Button
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   answer "Open another stack?" with "Open..." or "Cancel"
  50.   if it is "Cancel" then exit mouseUp
  51.   doMenu "Open Stack..."
  52. end mouseUp
  53.  
  54.  
  55.  
  56. -- part 37 (field)
  57. -- low flags: 01
  58. -- high flags: 2007
  59. -- rect: left=14 top=106 right=257 bottom=247
  60. -- title width / last selected line: 0
  61. -- icon id / first selected line: 0 / 0
  62. -- text alignment: 0
  63. -- font id: 3
  64. -- text size: 14
  65. -- style flags: 0
  66. -- line height: 18
  67. -- part name: 
  68.  
  69.  
  70. -- part 71 (button)
  71. -- low flags: 00
  72. -- high flags: 2000
  73. -- rect: left=185 top=289 right=325 bottom=213
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 1006 / 1006
  76. -- text alignment: 1
  77. -- font id: 0
  78. -- text size: 12
  79. -- style flags: 0
  80. -- line height: 16
  81. -- part name: New Button
  82. ----- HyperTalk script -----
  83. on mouseUp
  84.   answer "Quit Hypercard?" with "Quit..." or "Cancel"
  85.   if it is "Cancel" then exit mouseUp
  86.   doMenu "Quit Hypercard"
  87. end mouseUp
  88.  
  89.  
  90.  
  91. -- part 73 (field)
  92. -- low flags: 01
  93. -- high flags: 0001
  94. -- rect: left=327 top=283 right=295 bottom=349
  95. -- title width / last selected line: 0
  96. -- icon id / first selected line: 0 / 0
  97. -- text alignment: 0
  98. -- font id: 3
  99. -- text size: 12
  100. -- style flags: 0
  101. -- line height: 16
  102. -- part name: 
  103.  
  104.  
  105. -- part 74 (button)
  106. -- low flags: 00
  107. -- high flags: 0000
  108. -- rect: left=363 top=31 right=65 bottom=397
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 27056 / 27056
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: toggle1
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   hide card button toggle1
  120.   show card button toggle2
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 75 (button)
  126. -- low flags: 80
  127. -- high flags: 0000
  128. -- rect: left=363 top=31 right=65 bottom=397
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 19969 / 19969
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: toggle2
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   hide card button toggle2
  140.   show card button toggle1
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 76 (button)
  146. -- low flags: 80
  147. -- high flags: 0000
  148. -- rect: left=288 top=195 right=229 bottom=322
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 154 / 154
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: square2
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   hide card button square2
  160.   show card button square1
  161. end mouseUp
  162.  
  163.  
  164.  
  165. -- part 77 (button)
  166. -- low flags: 00
  167. -- high flags: 0000
  168. -- rect: left=288 top=195 right=229 bottom=322
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 12123 / 12123
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: square1
  177. ----- HyperTalk script -----
  178. on mouseUp
  179.   hide card button square1
  180.   show card button square2
  181. end mouseUp
  182.  
  183.  
  184.  
  185. -- part 78 (button)
  186. -- low flags: 00
  187. -- high flags: 0000
  188. -- rect: left=448 top=69 right=81 bottom=466
  189. -- title width / last selected line: 0
  190. -- icon id / first selected line: 27432 / 27432
  191. -- text alignment: 1
  192. -- font id: 0
  193. -- text size: 12
  194. -- style flags: 0
  195. -- line height: 16
  196. -- part name: level
  197.  
  198.  
  199. -- part 79 (button)
  200. -- low flags: 00
  201. -- high flags: 0000
  202. -- rect: left=447 top=24 right=36 bottom=467
  203. -- title width / last selected line: 0
  204. -- icon id / first selected line: 27497 / 27497
  205. -- text alignment: 1
  206. -- font id: 0
  207. -- text size: 12
  208. -- style flags: 0
  209. -- line height: 16
  210. -- part name: up
  211. ----- HyperTalk script -----
  212. on mouseDown
  213.   get location of card button level
  214.   subtract 7 from item 2 of it
  215.   if item 2 of it < 41
  216.   then put 40 into item 2 of it
  217.   set location of card button level to it
  218. end mouseDown
  219.  
  220.  
  221. -- part 80 (button)
  222. -- low flags: 80
  223. -- high flags: 0000
  224. -- rect: left=289 top=31 right=65 bottom=323
  225. -- title width / last selected line: 0
  226. -- icon id / first selected line: 32590 / 32590
  227. -- text alignment: 1
  228. -- font id: 0
  229. -- text size: 12
  230. -- style flags: 0
  231. -- line height: 16
  232. -- part name: press2
  233. ----- HyperTalk script -----
  234. on mouseUp
  235.   hide card button press2
  236.   show card button press1
  237. end mouseUp
  238.  
  239.  
  240.  
  241. -- part 81 (button)
  242. -- low flags: 80
  243. -- high flags: 0000
  244. -- rect: left=363 top=198 right=232 bottom=397
  245. -- title width / last selected line: 0
  246. -- icon id / first selected line: 18184 / 18184
  247. -- text alignment: 1
  248. -- font id: 0
  249. -- text size: 12
  250. -- style flags: 0
  251. -- line height: 16
  252. -- part name: pointer1
  253. ----- HyperTalk script -----
  254. on mouseUp
  255.   hide card button pointer1
  256.   show card button pointer2
  257. end mouseUp
  258.  
  259.  
  260.  
  261. -- part 82 (button)
  262. -- low flags: 80
  263. -- high flags: 0000
  264. -- rect: left=363 top=198 right=232 bottom=397
  265. -- title width / last selected line: 0
  266. -- icon id / first selected line: 8899 / 8899
  267. -- text alignment: 1
  268. -- font id: 0
  269. -- text size: 12
  270. -- style flags: 0
  271. -- line height: 16
  272. -- part name: pointer4
  273. ----- HyperTalk script -----
  274. on mouseUp
  275.   hide card button pointer4
  276.   show card button pointer1
  277. end mouseUp
  278.  
  279.  
  280.  
  281. -- part 83 (button)
  282. -- low flags: 80
  283. -- high flags: 0000
  284. -- rect: left=363 top=198 right=232 bottom=397
  285. -- title width / last selected line: 0
  286. -- icon id / first selected line: 29213 / 29213
  287. -- text alignment: 1
  288. -- font id: 0
  289. -- text size: 12
  290. -- style flags: 0
  291. -- line height: 16
  292. -- part name: pointer3
  293. ----- HyperTalk script -----
  294. on mouseUp
  295.   hide card button pointer3
  296.   show card button pointer4
  297. end mouseUp
  298.  
  299.  
  300.  
  301. -- part 84 (button)
  302. -- low flags: 00
  303. -- high flags: 0000
  304. -- rect: left=364 top=116 right=150 bottom=398
  305. -- title width / last selected line: 0
  306. -- icon id / first selected line: 23555 / 23555
  307. -- text alignment: 1
  308. -- font id: 0
  309. -- text size: 12
  310. -- style flags: 0
  311. -- line height: 16
  312. -- part name: wall1
  313. ----- HyperTalk script -----
  314. on mouseUp
  315.   hide card button wall1
  316.   show card button wall2
  317. end mouseUp
  318.  
  319.  
  320.  
  321. -- part 85 (button)
  322. -- low flags: 80
  323. -- high flags: 0000
  324. -- rect: left=364 top=115 right=149 bottom=398
  325. -- title width / last selected line: 0
  326. -- icon id / first selected line: 25420 / 25420
  327. -- text alignment: 1
  328. -- font id: 0
  329. -- text size: 12
  330. -- style flags: 0
  331. -- line height: 16
  332. -- part name: wall2
  333. ----- HyperTalk script -----
  334. on mouseUp
  335.   hide card button wall2
  336.   show card button wall1
  337. end mouseUp
  338.  
  339.  
  340.  
  341. -- part 86 (button)
  342. -- low flags: 80
  343. -- high flags: 0000
  344. -- rect: left=440 top=130 right=164 bottom=474
  345. -- title width / last selected line: 0
  346. -- icon id / first selected line: 28762 / 28762
  347. -- text alignment: 1
  348. -- font id: 0
  349. -- text size: 12
  350. -- style flags: 0
  351. -- line height: 16
  352. -- part name: barrel1
  353. ----- HyperTalk script -----
  354. on mouseUp
  355.   hide card button barrel1
  356.   show card button barrel2
  357. end mouseUp
  358.  
  359.  
  360.  
  361. -- part 87 (button)
  362. -- low flags: 00
  363. -- high flags: 0000
  364. -- rect: left=440 top=130 right=164 bottom=474
  365. -- title width / last selected line: 0
  366. -- icon id / first selected line: 30651 / 30651
  367. -- text alignment: 1
  368. -- font id: 0
  369. -- text size: 12
  370. -- style flags: 0
  371. -- line height: 16
  372. -- part name: barrel2
  373. ----- HyperTalk script -----
  374. on mouseUp
  375.   hide card button barrel2
  376.   show card button barrel1
  377. end mouseUp
  378.  
  379.  
  380.  
  381. -- part 88 (button)
  382. -- low flags: 00
  383. -- high flags: 0000
  384. -- rect: left=288 top=112 right=146 bottom=322
  385. -- title width / last selected line: 0
  386. -- icon id / first selected line: 795 / 795
  387. -- text alignment: 1
  388. -- font id: 0
  389. -- text size: 12
  390. -- style flags: 0
  391. -- line height: 16
  392. -- part name: select1
  393. ----- HyperTalk script -----
  394. on mouseUp
  395.   hide card button select1
  396.   show card button select2
  397. end mouseUp
  398.  
  399.  
  400.  
  401. -- part 89 (button)
  402. -- low flags: 80
  403. -- high flags: 0000
  404. -- rect: left=288 top=112 right=146 bottom=322
  405. -- title width / last selected line: 0
  406. -- icon id / first selected line: 27926 / 27926
  407. -- text alignment: 1
  408. -- font id: 0
  409. -- text size: 12
  410. -- style flags: 0
  411. -- line height: 16
  412. -- part name: select2
  413. ----- HyperTalk script -----
  414. on mouseUp
  415.   hide card button select2
  416.   show card button select1
  417. end mouseUp
  418.  
  419.  
  420.  
  421. -- part 90 (button)
  422. -- low flags: 00
  423. -- high flags: 0000
  424. -- rect: left=363 top=198 right=232 bottom=397
  425. -- title width / last selected line: 0
  426. -- icon id / first selected line: 28978 / 28978
  427. -- text alignment: 1
  428. -- font id: 0
  429. -- text size: 12
  430. -- style flags: 0
  431. -- line height: 16
  432. -- part name: pointer2
  433. ----- HyperTalk script -----
  434. on mouseUp
  435.   hide card button pointer2
  436.   show card button pointer3
  437. end mouseUp
  438.  
  439.  
  440.  
  441. -- part 91 (button)
  442. -- low flags: 80
  443. -- high flags: 0000
  444. -- rect: left=439 top=201 right=235 bottom=473
  445. -- title width / last selected line: 0
  446. -- icon id / first selected line: 29094 / 29094
  447. -- text alignment: 1
  448. -- font id: 0
  449. -- text size: 12
  450. -- style flags: 0
  451. -- line height: 16
  452. -- part name: bat1
  453. ----- HyperTalk script -----
  454. on mouseUp
  455.   hide card button bat1
  456.   show card button bat2
  457. end mouseUp
  458.  
  459.  
  460.  
  461. -- part 92 (button)
  462. -- low flags: 00
  463. -- high flags: 0000
  464. -- rect: left=436 top=199 right=233 bottom=470
  465. -- title width / last selected line: 0
  466. -- icon id / first selected line: 25040 / 25040
  467. -- text alignment: 1
  468. -- font id: 0
  469. -- text size: 12
  470. -- style flags: 0
  471. -- line height: 16
  472. -- part name: bat2
  473. ----- HyperTalk script -----
  474. on mouseUp
  475.   hide card button bat2
  476.   show card button bat1
  477. end mouseUp
  478.  
  479.  
  480.  
  481. -- part 93 (button)
  482. -- low flags: 00
  483. -- high flags: 0000
  484. -- rect: left=289 top=31 right=65 bottom=323
  485. -- title width / last selected line: 0
  486. -- icon id / first selected line: 6922 / 6922
  487. -- text alignment: 1
  488. -- font id: 0
  489. -- text size: 12
  490. -- style flags: 0
  491. -- line height: 16
  492. -- part name: press1
  493. ----- HyperTalk script -----
  494. on mouseDown
  495.   hide card button press1
  496.   show card button press2
  497. end mouseDown
  498.  
  499.  
  500.  
  501. -- part 94 (button)
  502. -- low flags: 00
  503. -- high flags: 0000
  504. -- rect: left=448 top=78 right=90 bottom=466
  505. -- title width / last selected line: 0
  506. -- icon id / first selected line: 27497 / 27497
  507. -- text alignment: 1
  508. -- font id: 0
  509. -- text size: 12
  510. -- style flags: 0
  511. -- line height: 16
  512. -- part name: down
  513. ----- HyperTalk script -----
  514. on mouseDown
  515.   get location of card button level
  516.   add 7 to item 2 of it
  517.   if item 2 of it > 74
  518.   then put 75 into item 2 of it
  519.   set location of card button level to it
  520. end mouseDown
  521.  
  522.  
  523.  
  524. -- part contents for card part 37
  525. ----- text -----
  526. This stack contains a second group of nine new and different 
  527. √•~^¬µ√•‚Ƭ¥‚àÇ ‚à´¬®‚Ć‚Ć√∏~√ü which you may use in your own stacks.  Click on them now for a look at what they do. If you do not already have it, Clicky Buttons Volume 1 is also in this data library.
  528.  
  529. To transport these button icons to your own stacks, you can use ResEdit or a stack-based resource mover.
  530.  
  531. We believe in quality stackware. Lend your support to our future endeavors by joining our mailing list. Drop an Email or send us a SASE for a copy of our latest catalog.
  532.  
  533. We are:
  534.  
  535. T H E   A C M E   D O T   C O.
  536. P. O.   B O X   5 9 2 3
  537. T I T U S V I L L E ,  F L
  538.  3 2 7 8 3
  539.  
  540. CompuServe: 76703,654
  541. Genie: SHOPPER
  542.  
  543. And from all of us to all of you,
  544. ˚´´π ø~ ß†åç˚^~©.
  545.